;; The first three lines of this file were inserted by DrScheme. They record metadata
;; about the language level of this file in a form that our tools can easily process.
#reader(planet plai/plai:1:3/lang/reader)
(define (a-plus-abs-b a b)
  ((if (> b 0) + -) a b))


(print-only-errors #t)
(test (a-plus-abs-b 2 3) 5)
(test (a-plus-abs-b 2 -3) 5)
